perm filename ATC.UNF[MRS,LSP]2 blob sn#647777 filedate 1982-03-06 generic text, type T, neo UTF8
'(THIS IS THE UNFASL FOR ((DSK (MRS LSP)) ATC LSP)) 
'(ASSEMBLED BY FASLAP /392) 
'(COMPILED BY LISP COMPILER /936 COMAUX /25 PHAS1 /84 MAKLAP /80 INITIA /117) 

;COMPILED ON MARCH 6, 1982, AT 8:17 AM

;Loading DEFSTRUCT 233
;CAUTION!  DEFSTRUCT-DONT-DISPLACE, A USER SUBR AT 42066, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  GET-DEFSTRUCT-DESCRIPTION, A USER SUBR AT 42070, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  |DEFSTRUCT MACRO|, A USER SUBR AT 42122, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-PARSE-OPTIONS, A USER SUBR AT 42426, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-PARSE-ITEMS, A USER SUBR AT 43543, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-PARSE-ONE-FIELD, A USER LSUBR AT 44062, IS BEING REDEFINED
;    AS A LSUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-DEFINE-REF-MACROS, A USER SUBR AT 44122, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-EXPAND-SIZE-MACRO, A USER SUBR AT 44447, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-EXPAND-REF-MACRO, A USER SUBR AT 44506, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-PARSE-SETQ-STYLE-SLOTS, A USER SUBR AT 44710, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-MAKE-INIT-DSC, A USER LSUBR AT 44767, IS BEING REDEFINED
;    AS A LSUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-CODE-FROM-DSC, A USER SUBR AT 45176, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-EXPAND-CONS-MACRO, A USER SUBR AT 45356, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-EXPAND-ALTER-MACRO, A USER SUBR AT 46312, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  |DEFSTRUCT-DEFINE-TYPE MACRO|, A USER SUBR AT 46530, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  ARRAY-DEFSTRUCT-CONS, A USER SUBR AT 47244, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  ARRAY-DEFSTRUCT-REF, A USER SUBR AT 47246, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  FIXNUM-ARRAY-DEFSTRUCT-CONS, A USER SUBR AT 47256, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  FIXNUM-ARRAY-DEFSTRUCT-REF, A USER SUBR AT 47260, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  FLONUM-ARRAY-DEFSTRUCT-CONS, A USER SUBR AT 47270, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  FLONUM-ARRAY-DEFSTRUCT-REF, A USER SUBR AT 47272, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  UN-GC-ARRAY-DEFSTRUCT-CONS, A USER SUBR AT 47302, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  UN-GC-ARRAY-DEFSTRUCT-REF, A USER SUBR AT 47304, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  MACLISP-ARRAY-FOR-DEFSTRUCT, A USER SUBR AT 47314, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  SFA-DEFSTRUCT-CONS, A USER SUBR AT 47450, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  SFA-DEFSTRUCT-REF, A USER SUBR AT 47622, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  HUNK-DEFSTRUCT-CONS, A USER SUBR AT 47630, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  HUNK-DEFSTRUCT-REF, A USER SUBR AT 47652, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  NAMED-HUNK-DEFSTRUCT-CONS, A USER SUBR AT 47661, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  NAMED-HUNK-DEFSTRUCT-REF, A USER SUBR AT 47717, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  VECTOR-DEFSTRUCT-CONS, A USER SUBR AT 47745, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  VECTOR-DEFSTRUCT-REF, A USER SUBR AT 47747, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  EXTEND-DEFSTRUCT-CONS, A USER SUBR AT 47755, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  EXTEND-DEFSTRUCT-REF, A USER SUBR AT 50071, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  EXTEND-DEFSTRUCT-EXPAND, A USER SUBR AT 50107, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  LIST-DEFSTRUCT-CONS, A USER SUBR AT 50273, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  LIST-DEFSTRUCT-REF, A USER SUBR AT 50275, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  NAMED-LIST-DEFSTRUCT-CONS, A USER SUBR AT 50304, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  NAMED-LIST-DEFSTRUCT-REF, A USER SUBR AT 50317, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  LIST*-DEFSTRUCT-CONS, A USER SUBR AT 50332, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  LIST*-DEFSTRUCT-REF, A USER SUBR AT 50334, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  LIST*-DEFSTRUCT-EXPAND, A USER SUBR AT 50371, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  TREE-DEFSTRUCT-CONS, A USER SUBR AT 50413, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  TREE-DEFSTRUCT-REF, A USER SUBR AT 50435, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  TREE-DEFSTRUCT-EXPAND, A USER SUBR AT 50521, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  MAKE-TREE-FOR-DEFSTRUCT, A USER SUBR AT 50543, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  FIXNUM-DEFSTRUCT-CONS, A USER SUBR AT 50637, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  FIXNUM-DEFSTRUCT-REF, A USER SUBR AT 50660, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-EXAMINE, A USER SUBR AT 50662, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-DEPOSIT, A USER SUBR AT 50703, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

;CAUTION!  DEFSTRUCT-EXAMINE&DEPOSIT-FIND-SLOT-DESCRIPTION, A USER SUBR AT 50734, IS BEING REDEFINED
;    AS A SUBR BY FASL FILE ((DSK (MAC LSP)) STRUCT FAS)

'↑↓-TERM 
'LT-QUANTIFIER 
'ROLELINK 
'PFC-FORMULA 
'ROLEXENTRY 
'LT-λ-EXPR 
'LT-λ-PREFIX 
'PATHKEYLIST 
	(COMMENT **FASL** 0. (LAP |*DEFUN MACRO| SUBR)) 
	(COMMENT **FASL** 179. (LAP |E:DO MACRO| SUBR)) 
	(COMMENT **FASL** 207. (LAP |E:VAR MACRO| SUBR)) 
	(COMMENT **FASL** 239. (LAP E:SETLINE SUBR)) 
	(COMMENT **FASL** 277. (LAP |CONSP MACRO| SUBR)) 
	(COMMENT **FASL** 306. (LAP |LAMBDA-OPR MACRO| SUBR)) 
	(COMMENT **FASL** 335. (LAP |ADDCONC MACRO| SUBR)) 
	(COMMENT **FASL** 371. (LAP |ENDCONC MACRO| SUBR)) 
	(COMMENT **FASL** 419. (LAP |ENDADD MACRO| SUBR)) 
	(COMMENT **FASL** 473. (LAP |RASSQ MACRO| SUBR)) 
	(COMMENT **FASL** 522. (LAP |EDITXDO MACRO| SUBR)) 
	(COMMENT **FASL** 578. (LAP |EDITDO MACRO| SUBR)) 
	(COMMENT **FASL** 616. (LAP |COPYLIST MACRO| SUBR)) 
	(COMMENT **FASL** 642. (LAP |BUTLAST MACRO| SUBR)) 
	(COMMENT **FASL** 673. (LAP |REPEAT MACRO| SUBR)) 
	(COMMENT **FASL** 712. (LAP |SETF* MACRO| SUBR)) 
	(COMMENT **FASL** 747. (LAP |SOME MACRO| SUBR)) 
	(COMMENT **FASL** 812. (LAP |SUBSET MACRO| SUBR)) 
	(COMMENT **FASL** 862. (LAP GOOD-NREVERSE SUBR)) 
	(COMMENT **FASL** 919. (LAP NSUBLIS SUBR)) 
	(COMMENT **FASL** 978. (LAP |HUNKQUANTP MACRO| SUBR)) 
	(COMMENT **FASL** 1013. (LAP QNSUBLIS SUBR)) 
	(COMMENT **FASL** 1107. (LAP |CONDCARPUSH MACRO| SUBR)) 
	(COMMENT **FASL** 1169. (LAP |WRITE MACRO| SUBR)) 
	(COMMENT **FASL** 1248. (LAP SPACES SUBR)) 
	(COMMENT **FASL** 1265. (LAP |NORMALIZE-CONNECTIVE MACRO| SUBR)) 
	(COMMENT **FASL** 1310. (LAP LINTYPE SUBR)) 
	(COMMENT **FASL** 1470. (LAP ENCODE-LINFORMULA SUBR)) 
	(COMMENT **FASL** 1480. (LAP |SETUPQUANTS MACRO| SUBR)) 
	(COMMENT **FASL** 1528. (LAP |ORDER-PATHKEYS MACRO| SUBR)) 
	(COMMENT **FASL** 1554. (LAP ENCODE-LINFORMULA-S SUBR)) 
	(COMMENT **FASL** 1800. (LAP TRANSFORM-ROLELINKS SUBR)) 
	(COMMENT **FASL** 1861. (LAP |NORMALIZE-DETERMINER MACRO| SUBR)) 
	(COMMENT **FASL** 1908. (LAP ENCODE-QUANT SUBR)) 
	(COMMENT **FASL** 2095. (LAP VARIABLE-RANGE SUBR)) 
	(COMMENT **FASL** 2131. (LAP GETFORMULA SUBR)) 
	(COMMENT **FASL** 2158. (LAP LT-TYPE SUBR)) 
	(COMMENT **FASL** 2331. (LAP DISPLAY LSUBR)) 
	(COMMENT **FASL** 2351. (LAP DPYLIST SUBR)) 
	(COMMENT **FASL** 2368. (LAP VNSUBLIS SUBR)) 
	(COMMENT **FASL** 2395. (LAP |INITIALIZE-GENVARINDEX MACRO| SUBR)) 
	(COMMENT **FASL** 2404. (LAP GENVAR LSUBR)) 
	(COMMENT **FASL** 2537. (LAP |TERMSORT-VARANGE MACRO| SUBR)) 
	(COMMENT **FASL** 2568. (LAP MAKE-QVLIST SUBR)) 
	(COMMENT **FASL** 2756. (LAP |UNARY-ATOMIC MACRO| SUBR)) 
	(COMMENT **FASL** 2803. (LAP |NOPAREN-DISJUNCT MACRO| SUBR)) 
	(COMMENT **FASL** 2812. (LAP |DPYLIST-ROLINK MACRO| SUBR)) 
	(COMMENT **FASL** 2879. (LAP |MAKE-↑↓-[-ATOM MACRO| SUBR)) 
	(COMMENT **FASL** 2911. (LAP DPYLIST-S SUBR)) 
	(COMMENT **FASL** 3471. (LAP TCONC SUBR)) 
	(COMMENT **FASL** 3502. (LAP LCONC SUBR)) 
	(COMMENT **FASL** 3540. (LAP TERMSORT SUBR)) 
	(COMMENT **FASL** 3639. (LAP NORMALIZE-TERMSORTEXPR SUBR)) 
	(COMMENT **FASL** 3683. (LAP |PRINCLIST MACRO| SUBR)) 
	(COMMENT **FASL** 3710. (LAP |PRINSOURCECHUNK MACRO| SUBR)) 
	(COMMENT **FASL** 3719. (LAP |GETSBQLINE MACRO| SUBR)) 
	(COMMENT **FASL** 3794. (LAP |NEXTITEMSIZE MACRO| SUBR)) 
	(COMMENT **FASL** 3822. (LAP |PRINITEMS MACRO| SUBR)) 
	(COMMENT **FASL** 3884. (LAP |PRINSUBQUANT1 MACRO| SUBR)) 
	(COMMENT **FASL** 3917. (LAP |PRINSUBQUANT2 MACRO| SUBR)) 
	(COMMENT **FASL** 3950. (LAP |GETQUANTLINE MACRO| SUBR)) 
	(COMMENT **FASL** 4001. (LAP |GETλ-LINE MACRO| SUBR)) 
	(COMMENT **FASL** 4050. (LAP |MAXVARIABLENGTH MACRO| SUBR)) 
	(COMMENT **FASL** 4085. (LAP |SPACELEFT MACRO| SUBR)) 
	(COMMENT **FASL** 4094. (LAP STRAIGHTPRIN SUBR)) 
	(COMMENT **FASL** 4356. (LAP PRINQUANT SUBR)) 
	(COMMENT **FASL** 4629. (LAP PRINλ-EXPR SUBR)) 
	(COMMENT **FASL** 4678. (LAP TAB SUBR)) 
	(COMMENT **FASL** 4708. (LAP CURRENTPOS LSUBR)) 
'LINK-NODE 
'LEAF-NODE 
'LTCC-PLIST 
	(COMMENT **FASL** 4724. (LAP |NRML-ANL-YZE MACRO| SUBR)) 
	(COMMENT **FASL** 4775. (LAP |LT-CONCEPT-TYPE MACRO| SUBR)) 
	(COMMENT **FASL** 4826. (LAP |ADD-NEWLINK MACRO| SUBR)) 
	(COMMENT **FASL** 4874. (LAP NORMALIZE-CMPD-CONCEPT LSUBR)) 
	(COMMENT **FASL** 4961. (LAP INITIALIZE-CMPD-CONCEPT SUBR)) 
	(COMMENT **FASL** 5005. (LAP |CONCEPT-BODY MACRO| SUBR)) 
	(COMMENT **FASL** 5048. (LAP |1ST-PROCESS-↑-MATRIX MACRO| SUBR)) 
	(COMMENT **FASL** 5103. (LAP |PROCESS-↑-MATRIX MACRO| SUBR)) 
	(COMMENT **FASL** 5156. (LAP |COLLECT-IMAGES MACRO| SUBR)) 
	(COMMENT **FASL** 5211. (LAP |MERGED-PKLS MACRO| SUBR)) 
	(COMMENT **FASL** 5238. (LAP |SETUP-λ-EXPR MACRO| SUBR)) 
	(COMMENT **FASL** 5304. (LAP |PREVIOUS-LETTER MACRO| SUBR)) 
	(COMMENT **FASL** 5337. (LAP |ANALYZE-ADVERBIALIZATION MACRO| SUBR)) 
	(COMMENT **FASL** 5404. (LAP |INST-KEYS MACRO| SUBR)) 
	(COMMENT **FASL** 5466. (LAP |[MRS,LSP]ATC.LSP←6.| SUBR)) 
	(COMMENT **FASL** 5617. (LAP ORDER-JUNCTS SUBR)) 
	(COMMENT **FASL** 5622. (LAP |GET-PKL-POSITION MACRO| SUBR)) 
	(COMMENT **FASL** 5691. (LAP |GET-Q-OP MACRO| SUBR)) 
	(COMMENT **FASL** 5745. (LAP |↑-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5772. (LAP |λ-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5799. (LAP |*-OR-↑-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5825. (LAP |*-OR-C-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5851. (LAP |C-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5878. (LAP |2:9-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5915. (LAP |NUMERAL-ASCII MACRO| SUBR)) 
	(COMMENT **FASL** 5952. (LAP |λ↑-RAISE-CC-OP MACRO| SUBR)) 
	(COMMENT **FASL** 5985. (LAP |RAISE-CC MACRO| SUBR)) 
	(COMMENT **FASL** 6041. (LAP |RAISE-CC-OP MACRO| SUBR)) 
	(COMMENT **FASL** 6074. (LAP |GET-BASE-OP MACRO| SUBR)) 
	(COMMENT **FASL** 6122. (LAP |GET-S&S-KEY MACRO| SUBR)) 
	(COMMENT **FASL** 6177. (LAP NORMRAISE-CC LSUBR)) 
	(COMMENT **FASL** 6686. (LAP QV-QUASI-UNSUBST LSUBR)) 
	(COMMENT **FASL** 6929. (LAP ANALYZE-CMPD-CONCEPT LSUBR)) 
	(COMMENT **FASL** 8380. (LAP NACC LSUBR)) 
	(COMMENT **FASL** 8421. (LAP |GET-PK-POSITION MACRO| SUBR)) 
	(COMMENT **FASL** 8464. (LAP |GET-MERGEKEYS MACRO| SUBR)) 
	(COMMENT **FASL** 8520. (LAP |EXPAND-MERGED-PKEYLISTS MACRO| SUBR)) 
	(COMMENT **FASL** 8577. (LAP ANALYZE-ROLEMERGE SUBR)) 
	(COMMENT **FASL** 8765. (LAP ATOM-CONVERTIBLE SUBR)) 
	(COMMENT **FASL** 8815. (LAP ADJUST-λ-TERMSORT SUBR)) 
	(COMMENT **FASL** 8845. (LAP COMMON-SUBSORT* SUBR)) 
	(COMMENT **FASL** 8889. (LAP SUPERSORT* SUBR)) 
	(COMMENT **FASL** 9026. (LAP |MAKE-↑-MARKER MACRO| SUBR)) 
	(COMMENT **FASL** 9089. (LAP PATHKEY-SORT SUBR)) 
	(COMMENT **FASL** 9230. (LAP GET-ROLELINK SUBR)) 
	(COMMENT **FASL** 9263. (LAP |ALPHA-NTH MACRO| SUBR)) 
	(COMMENT **FASL** 9308. (LAP TERM-SUBRANCH SUBR)) 
	(COMMENT **FASL** 9373. (LAP |ANY-IDENTICAL-ROLE-INSTANCES? MACRO| SUBR)) 
	(COMMENT **FASL** 9425. (LAP |HAS-UNIQUE-ROLEMARKS MACRO| SUBR)) 
	(COMMENT **FASL** 9484. (LAP |INDEX-TYPE MACRO| SUBR)) 
	(COMMENT **FASL** 9530. (LAP COPYALLCONS SUBR)) 
	(COMMENT **FASL** 9546. (LAP COPY-1-1-PKLS SUBR)) 
	(COMMENT **FASL** 9583. (LAP LT-COPYALL SUBR)) 
	(COMMENT **FASL** 9590. (LAP LT-COPYALL* SUBR)) 
	(COMMENT **FASL** 9753. (LAP SELECT&SHORTEN SUBR)) 
	(COMMENT **FASL** 9818. (LAP |[MRS,LSP]ATC.LSP←7.| SUBR)) 
	(COMMENT **FASL** 9823. (LAP ORDER-PATHKEYLISTS SUBR)) 
	(COMMENT **FASL** 9825. (LAP ORDER-ROLELINKS SUBR)) 
	(COMMENT **FASL** 9836. (LAP COMPARE-ROLEORDER SUBR)) 
	(COMMENT **FASL** 9842. (LAP CULL-EQS SUBR)) 
	(COMMENT **FASL** 9861. (LAP |CONDENSE-RL-KEYLISTS MACRO| SUBR)) 
	(COMMENT **FASL** 9900. (LAP |ATOM-QUASI-UNSUBST MACRO| SUBR)) 
	(COMMENT **FASL** 9957. (LAP ANALYZE-INSTANTIATION SUBR)) 
	(COMMENT **FASL** 10304. (LAP λ-UNSUBST LSUBR)) 
	(COMMENT **FASL** 10400. (LAP |CC-KEY-ROLINK-NUMBER MACRO| SUBR)) 
	(COMMENT **FASL** 10451. (LAP |INITSTR= MACRO| SUBR)) 
	(COMMENT **FASL** 10502. (LAP λ-INST-KEY SUBR)) 
	(COMMENT **FASL** 10578. (LAP RAISEATOM SUBR)) 
	(COMMENT **FASL** 10627. (LAP GET-↑-MARKER SUBR)) 
	(COMMENT **FASL** 10668. (LAP GET-↑-TALLY SUBR)) 
	(COMMENT **FASL** 10786. (LAP LOWER-↑-ATOM SUBR)) 
	(COMMENT **FASL** 10834. (LAP LOWER-λ-TERMSORTS SUBR)) 
	(COMMENT **FASL** 10875. (LAP RAISE-λ-TERMSORTS SUBR)) 
	(COMMENT **FASL** 10913. (LAP RAISE↑-TERM SUBR)) 
	(COMMENT **FASL** 10950. (LAP |NEXTLETTER MACRO| SUBR)) 
	(COMMENT **FASL** 10983. (LAP KEYNUMBER SUBR)) 
	(COMMENT **FASL** 11005. (LAP |LISTCOMPS MACRO| SUBR)) 
	(COMMENT **FASL** 11037. (LAP |EXPOUND-ANALYSIS-MODULE-1 MACRO| SUBR)) 
	(COMMENT **FASL** 11154. (LAP POSPRINC LSUBR)) 
	(COMMENT **FASL** 11221. (LAP ANALYZE&EXPOUND LSUBR)) 
	(COMMENT **FASL** 11528. (LAP A&E LSUBR)) 
	(COMMENT **FASL** 11550. (LAP FIX-AL SUBR)) 
	(COMMENT **FASL** 11587. (LAP EXPOUND-ANALYSIS-MODULE-2 SUBR)) 
	(COMMENT **FASL** 11755. (LAP EXPLORE-DNET LSUBR)) 
	(COMMENT **FASL** 11933. (LAP XPDN LSUBR)) 
	(COMMENT **FASL** 11957. (LAP GET-XPDN-COMMAND SUBR)) 
	(COMMENT **FASL** 11961. (LAP TRAVERSE-LINKS SUBR)) 
	(COMMENT **FASL** 12161. (LAP DISPLAY-KEYPATH SUBR)) 
	(COMMENT **FASL** 12250. (LAP DISPLAY-NODE SUBR)) 
	(COMMENT **FASL** 12377. (LAP EXTEND-CURRENT-KEYPATH SUBR)) 
	(COMMENT **FASL** 12437. (LAP SHORTEN-CURRENT-NODEPATH SUBR)) 
	(COMMENT **FASL** 12613. (LAP COUNT-LINKS&LEAVES SUBR)) 
	(COMMENT **FASL** 12692. (LAP PRINT-PROPERTIES SUBR)) 
'HELP-TABLE-ENTRY 
	(COMMENT **FASL** 12948. (LAP XPDN-HELP SUBR)) 
	(COMMENT **FASL** TOTAL =  13052. WORDS)